home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 4 / Mac Giga-ROM 4.0 - 1993.toast / FILES / HYP / C-D / DiskManager2.cpt / DiskManager 2.0 / background_2669.txt < prev    next >
Text File  |  1989-02-26  |  6KB  |  281 lines
  1. -- background: 2669 from stack: in.0
  2. -- bmap block id: 3905
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 11 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=2 top=304 right=338 bottom=41
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1011 / 1011
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Home
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual effect iris close
  23.   go "Home"
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part 43 (field)
  29. -- low flags: 00
  30. -- high flags: 0004
  31. -- rect: left=109 top=24 right=53 bottom=304
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 0
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 24
  39. -- part name: 
  40.  
  41.  
  42. -- part 44 (field)
  43. -- low flags: 00
  44. -- high flags: 4000
  45. -- rect: left=8 top=82 right=303 bottom=166
  46. -- title width / last selected line: 0
  47. -- icon id / first selected line: 0 / 0
  48. -- text alignment: 1
  49. -- font id: 3
  50. -- text size: 9
  51. -- style flags: 0
  52. -- line height: 12
  53. -- part name: 
  54.  
  55.  
  56. -- part 45 (field)
  57. -- low flags: 00
  58. -- high flags: 4000
  59. -- rect: left=172 top=82 right=303 bottom=413
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 0 / 0
  62. -- text alignment: 0
  63. -- font id: 3
  64. -- text size: 9
  65. -- style flags: 0
  66. -- line height: 12
  67. -- part name: 
  68.  
  69.  
  70. -- part 66 (field)
  71. -- low flags: 00
  72. -- high flags: 0007
  73. -- rect: left=415 top=56 right=306 bottom=508
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 0 / 0
  76. -- text alignment: 0
  77. -- font id: 4
  78. -- text size: 9
  79. -- style flags: 0
  80. -- line height: 12
  81. -- part name: 
  82.  
  83.  
  84. -- part 70 (button)
  85. -- low flags: 00
  86. -- high flags: A004
  87. -- rect: left=268 top=311 right=333 bottom=350
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 0 / 0
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: Find
  96. ----- HyperTalk script -----
  97. on mouseUp
  98.  
  99.   doMenu "Find..."
  100. end mouseUp
  101.  
  102.  
  103.  
  104. -- part 71 (button)
  105. -- low flags: 00
  106. -- high flags: A004
  107. -- rect: left=453 top=311 right=333 bottom=497
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 0 / 0
  110. -- text alignment: 1
  111. -- font id: 0
  112. -- text size: 12
  113. -- style flags: 0
  114. -- line height: 16
  115. -- part name: Sort
  116. ----- HyperTalk script -----
  117. on mouseUp
  118.   answer "Sort all cards of this stack according to:" with "First Name" or "Last Name" or "Cancel"
  119.   if it is "First Name"
  120.   then sort by first word of first line of field 1
  121. else if it is "Last Name"
  122. then sort by last word of first line of field 1
  123. end mouseUp
  124.  
  125.  
  126.  
  127. -- part 74 (button)
  128. -- low flags: 00
  129. -- high flags: 0000
  130. -- rect: left=48 top=303 right=342 bottom=96
  131. -- title width / last selected line: 0
  132. -- icon id / first selected line: 19381 / 19381
  133. -- text alignment: 1
  134. -- font id: 0
  135. -- text size: 12
  136. -- style flags: 0
  137. -- line height: 16
  138. -- part name: 
  139. ----- HyperTalk script -----
  140. on mouseUp
  141.   go to previous card
  142. end mouseUp
  143.  
  144.  
  145.  
  146. -- part 75 (button)
  147. -- low flags: 00
  148. -- high flags: 0000
  149. -- rect: left=214 top=303 right=342 bottom=262
  150. -- title width / last selected line: 0
  151. -- icon id / first selected line: 22308 / 22308
  152. -- text alignment: 1
  153. -- font id: 0
  154. -- text size: 12
  155. -- style flags: 0
  156. -- line height: 16
  157. -- part name: 
  158. ----- HyperTalk script -----
  159. on mouseUp
  160.  
  161.   go to next card
  162. end mouseUp
  163.  
  164.  
  165.  
  166. -- part 89 (button)
  167. -- low flags: 00
  168. -- high flags: A000
  169. -- rect: left=351 top=22 right=70 bottom=399
  170. -- title width / last selected line: 0
  171. -- icon id / first selected line: 12927 / 12927
  172. -- text alignment: 1
  173. -- font id: 0
  174. -- text size: 12
  175. -- style flags: 0
  176. -- line height: 16
  177. -- part name: Application
  178. ----- HyperTalk script -----
  179. on mouseUp
  180.   open the short name of the target
  181. end mouseUp
  182.  
  183.  
  184. -- part 90 (button)
  185. -- low flags: 00
  186. -- high flags: 8004
  187. -- rect: left=364 top=311 right=333 bottom=440
  188. -- title width / last selected line: 0
  189. -- icon id / first selected line: 0 / 0
  190. -- text alignment: 1
  191. -- font id: 0
  192. -- text size: 12
  193. -- style flags: 0
  194. -- line height: 16
  195. -- part name: New Card
  196. ----- HyperTalk script -----
  197. on mouseUp
  198.   set the cursor to 4
  199.   DoMenu New Card
  200.   wait 30
  201.   set the cursor to 1
  202.   tabKey
  203. end mouseUp
  204.  
  205.  
  206.  
  207. -- part 91 (button)
  208. -- low flags: 00
  209. -- high flags: A004
  210. -- rect: left=102 top=304 right=334 bottom=209
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 0 / 0
  213. -- text alignment: 1
  214. -- font id: 0
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: Make Label
  219. ----- HyperTalk script -----
  220. on mouseUp
  221.   put the userLevel into saveLevel
  222.   set the userLevel to 3
  223.   if the userLevel < 3 then exit mouseUp
  224.   answer "Transfer Title and Contents to:" with "Label 1" or "Label 2" or "Cancel"
  225.  
  226.   if it is "Label 1"
  227.   then
  228.   choose browse tool
  229.   set the cursor to 1
  230.   tabkey
  231.   domenu "copy text"
  232.   visual effect dissolve fast
  233.   go to card id 9559
  234.   choose browse tool
  235.   click at 27,321
  236.   click at 9,103
  237.   click at 98,114
  238.   domenu paste text
  239.   domenu "Back"
  240.   choose browse tool
  241.   tabkey
  242.   tabkey
  243.   domenu "copy text"
  244.   visual effect dissolve fast
  245.   go to card id 9559
  246.   choose browse tool
  247.   click at 69,270
  248.   click at 96,126
  249.   domenu "paste text"
  250.   domenu "back"
  251.   set the userLevel to saveLevel
  252. else if it is "Label 2"
  253. then
  254. put the userLevel into saveLevel
  255. set the userLevel to 3
  256. if the userLevel < 3 then exit mouseUp
  257. choose browse tool
  258. set the cursor to 1
  259. tabkey
  260. domenu "copy text"
  261. visual effect dissolve fast
  262. go to card id 9559
  263. choose browse tool
  264. click at 319,114
  265. domenu "paste text"
  266. domenu "Back"
  267. choose browse tool
  268. tabkey
  269. tabkey
  270. domenu "copy text"
  271. visual effect dissolve fast
  272. go to card id 9559
  273. choose browse tool
  274. click at 92,270
  275. click at 319,126
  276. domenu "paste text"
  277. end if
  278. set the userLevel to saveLevel
  279. end mouseUp
  280.  
  281.